//The One Thing Needful
//Original done by Checkman via Roger Bigod
//Tweaked *once* by JayPro 8-30-17
Aspc=1
A0=".95+rnd(.095)"
A1="2.5+rnd(.25)"
A2="3+rnd(.3)"
A3="1.1+rnd(.01)"

D0="trwv(-x*a0)"
D1="trwv(-y*a0)"

D2="sin(D0)*a1" 		
D3="sin(D1)*a1"

D4="flor(sqr(d2+d3)*a2)"
D5="flor(sqr(d2-d3)*a2)"

D6="sin(d2) - cos(d4) +D2 +atan(d4)*a3 "
D7="cos(d3) + sgn(d4)- D1+atan(d5)*a3"

D8="wrap(d7-sin(d6)+sgn(d4)-cos(d5))*a3*d2"
D9="wrap(d7+cos(d6)+atan2(d2,1)-atan(d3))*a3*d3"

srcX="abs(sin(theta)/D8)" //I added a polar tweak here to clean up the middle.
srcY="abs(D9)"

Vers=300

